home *** CD-ROM | disk | FTP | other *** search
/ AmigActive 25 / AACD 25.iso / AACD / Programming / yaec / modules / lowlevel.e < prev    next >
Encoding:
Text File  |  2001-08-12  |  1.9 KB  |  42 lines
  1. OPT MODULE
  2. OPT EXPORT
  3. -> Module created with E:bin/fd2module from YAECv18 package.
  4. OPT NDDC
  5. -> --- functions in V40 or higher (Release 3.1) ---
  6. -> 
  7. ->  CONTROLLER HANDLING
  8. -> 
  9. #macro ReadJoyPort(port) IS (D0:=port) BUT (A6:=lowlevelbase) BUT ASM ' jsr -30(a6)'
  10. -> 
  11. ->  LANGUAGE HANDLING
  12. -> 
  13. #macro GetLanguageSelection() IS (A6:=lowlevelbase) BUT ASM ' jsr -36(a6)'
  14. -> 
  15. ->  KEYBOARD HANDLING
  16. -> 
  17. #macro GetKey() IS (A6:=lowlevelbase) BUT ASM ' jsr -48(a6)'
  18. #macro QueryKeys(queryArray,arraySize) IS Stores(lowlevelbase,queryArray,arraySize) BUT Loads(A6,A0,D1) BUT ASM ' jsr -54(a6)'
  19. #macro AddKBInt(intRoutine,intData) IS Stores(lowlevelbase,intRoutine,intData) BUT Loads(A6,A0,A1) BUT ASM ' jsr -60(a6)'
  20. #macro RemKBInt(intHandle) IS (A1:=intHandle) BUT (A6:=lowlevelbase) BUT ASM ' jsr -66(a6)'
  21. -> 
  22. ->  SYSTEM HANDLING
  23. -> 
  24. #macro SystemControlA(tagList) IS (A1:=tagList) BUT (A6:=lowlevelbase) BUT ASM ' jsr -72(a6)'
  25. -> 
  26. ->  TIMER HANDLING
  27. -> 
  28. #macro AddTimerInt(intRoutine,intData) IS Stores(lowlevelbase,intRoutine,intData) BUT Loads(A6,A0,A1) BUT ASM ' jsr -78(a6)'
  29. #macro RemTimerInt(intHandle) IS (A1:=intHandle) BUT (A6:=lowlevelbase) BUT ASM ' jsr -84(a6)'
  30. #macro StopTimerInt(intHandle) IS (A1:=intHandle) BUT (A6:=lowlevelbase) BUT ASM ' jsr -90(a6)'
  31. #macro StartTimerInt(intHandle,timeInterval,continuous) IS Stores(lowlevelbase,intHandle,timeInterval,continuous) BUT Loads(A6,A1,D0,D1) BUT ASM ' jsr -96(a6)'
  32. #macro ElapsedTime(context) IS (A0:=context) BUT (A6:=lowlevelbase) BUT ASM ' jsr -102(a6)'
  33. -> 
  34. ->  VBLANK HANDLING
  35. -> 
  36. #macro AddVBlankInt(intRoutine,intData) IS Stores(lowlevelbase,intRoutine,intData) BUT Loads(A6,A0,A1) BUT ASM ' jsr -108(a6)'
  37. #macro RemVBlankInt(intHandle) IS (A1:=intHandle) BUT (A6:=lowlevelbase) BUT ASM ' jsr -114(a6)'
  38. -> 
  39. ->  MORE CONTROLLER HANDLING
  40. -> 
  41. #macro SetJoyPortAttrsA(portNumber,tagList) IS Stores(lowlevelbase,portNumber,tagList) BUT Loads(A6,D0,A1) BUT ASM ' jsr -132(a6)'
  42.